home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / ASSEMBLE / 2322C.ZIP / A68 / MNEMTEST.ASM < prev    next >
Assembly Source File  |  1990-05-22  |  13KB  |  579 lines
  1. ;        Motorola Instruction Set Example
  2. ;
  3. ;  The following program listing provides the user with an example
  4. ;  of the motorola 6800 addressing modes as implemented by PseudoCode.
  5. ;
  6. ;  Familiarity with the following is suggested.
  7. ;
  8.          .org 0
  9.          adda #h'00           ;immediate addressing
  10.          adda #h'ff
  11.          adda 100             ;direct addressing
  12.          adda > 100           ;forced extended addressing
  13.          adda < forward1      ;forced direct addressing
  14.          adda > forward1      ;forced extended addressing (not needed)
  15.          adda < 100           ;forced direct addressing  (not needed)
  16.          adda h'00,x          ;indexed addressing
  17.          adda h'ff,x
  18.          adda 1000            ;extended addressing
  19.          addb #h'00
  20.          addb #h'ff
  21.          addb 100
  22.          addb h'00,x
  23.          addb h'ff,x
  24.          addb 1000
  25.          adca #h'00
  26.          adca #h'ff
  27.          adca 100
  28.          adca h'00,x
  29.          adca h'ff,x
  30.          adca 1000
  31.          adcb #h'00
  32.          adcb #h'ff
  33.          adcb 100
  34.          adcb h'00,x
  35.          adcb h'ff,x
  36.          adcb 1000
  37.          anda #h'00
  38.          anda #h'ff
  39.          anda 100
  40.          anda h'00,x
  41.          anda h'ff,x
  42.          anda 1000
  43.          andb #h'00
  44.          andb #h'ff
  45.          andb 100
  46.          andb h'00,x
  47.          andb h'ff,x
  48.          andb 1000
  49.          bita #h'00
  50.          bita #h'ff
  51.          bita 100
  52.          bita h'00,x
  53.          bita h'ff,x
  54.          bita 1000
  55.          bitb #h'00
  56.          bitb #h'ff
  57.          bitb 100
  58.          bitb h'00,x
  59.          bitb h'ff,x
  60.          bitb 1000
  61.          cmpa #h'00
  62.          cmpa #h'ff
  63.          cmpa 100
  64.          cmpa h'00,x
  65.          cmpa h'ff,x
  66.          cmpa 1000
  67.          cmpb #h'00
  68.          cmpb #h'ff
  69.          cmpb 100
  70.          cmpb h'00,x
  71.          cmpb h'ff,x
  72.          cmpb 1000
  73.          eora #h'00
  74.          eora #h'ff
  75.          eora 100
  76.          eora h'00,x
  77.          eora h'ff,x
  78.          eora 1000
  79.          eorb #h'00
  80.          eorb #h'ff
  81.          eorb 100
  82.          eorb h'00,x
  83.          eorb h'ff,x
  84.          eorb 1000
  85.          ldaa > 100           ;forced extended addressing
  86.          ldaa < forward1      ;forced direct addressing
  87.          ldaa > forward1      ;forced extended addressing (not needed)
  88.          ldaa < 100           ;forced direct addressing  (not needed)
  89.          ldaa #h'00
  90.          ldaa #h'ff
  91.          ldaa 100
  92.          ldaa h'00,x
  93.          ldaa h'ff,x
  94.          ldaa 1000
  95.          ldab #h'00
  96.          ldab #h'ff
  97.          ldab 100
  98.          ldab h'00,x
  99.          ldab h'ff,x
  100.          ldab 1000
  101.          oraa #h'00
  102.          oraa #h'ff
  103.          oraa 100
  104.          oraa h'00,x
  105.          oraa h'ff,x
  106.          oraa 1000
  107.          orab #h'00
  108.          orab #h'ff
  109.          orab 100
  110.          orab h'00,x
  111.          orab h'ff,x
  112.          orab 1000
  113.          staa 100
  114.          staa h'00,x
  115.          staa h'ff,x
  116.          staa 1000
  117.          stab 100
  118.          stab h'00,x
  119.          stab h'ff,x
  120.          stab 1000
  121.          suba #h'00
  122.          suba #h'ff
  123.          suba 100
  124.          suba h'00,x
  125.          suba h'ff,x
  126.          suba 1000
  127.          subb #h'00
  128.          subb #h'ff
  129.          subb 100
  130.          subb h'00,x
  131.          subb h'ff,x
  132.          subb 1000
  133.          sbca #h'00
  134.          sbca #h'ff
  135.          sbca 100
  136.          sbca h'00,x
  137.          sbca h'ff,x
  138.          sbca 1000
  139.          sbcb #h'00
  140.          sbcb #h'ff
  141.          sbcb 100
  142.          sbcb h'00,x
  143.          sbcb h'ff,x
  144.          sbcb 1000
  145.          cpx #h'00
  146.          cpx #h'ff
  147.          cpx 100
  148.          cpx h'00,x
  149.          cpx h'ff,x
  150.          cpx 1000
  151.          ldx #h'00
  152.          ldx #h'ff
  153.          ldx 100
  154.          ldx h'00,x
  155.          ldx h'ff,x
  156.          ldx 100
  157.          ldx 1000
  158.          ldx  > 100
  159.          ldx  > 1000
  160.          ldx  < 100
  161.          ldx  < 1000
  162.          ldx  > forward3
  163.          ldx  > forward4
  164.          ldx  < forward3
  165.          lds #h'00
  166.          lds #h'ff
  167.          lds 100
  168.          lds h'00,x
  169.          lds h'ff,x
  170.          lds 1000
  171.          stx 100
  172.          stx h'00,x
  173.          stx h'ff,x
  174.          stx 1000
  175.          sts 100
  176.          sts h'00,x
  177.          sts h'ff,x
  178.          sts 1000
  179.          clr 100
  180.          clr h'00,x
  181.          clr h'ff,x
  182.          clr 1000
  183.          com 100
  184.          com h'00,x
  185.          com h'ff,x
  186.          com 1000
  187.          neg 100
  188.          neg h'00,x
  189.          neg h'ff,x
  190.          neg 1000
  191.          dec 100
  192.          dec h'00,x
  193.          dec h'ff,x
  194.          dec 1000
  195.          inc 100
  196.          inc h'00,x
  197.          inc h'ff,x
  198.          inc 1000
  199.          rol 100
  200.          rol h'00,x
  201.          rol h'ff,x
  202.          rol 1000
  203.          ror 100
  204.          ror h'00,x
  205.          ror h'ff,x
  206.          ror 1000
  207.          asl 100
  208.          asl h'00,x
  209.          asl h'ff,x
  210.          asl 1000
  211.          asr 100
  212.          asr h'00,x
  213.          asr h'ff,x
  214.          asr 1000
  215.          lsr 100
  216.          lsr h'00,x
  217.          lsr h'ff,x
  218.          lsr 1000
  219.          tst 100
  220.          tst h'00,x
  221.          tst h'ff,x
  222.          tst 1000
  223.          jmp 100
  224.          jmp h'00,x
  225.          jmp h'ff,x
  226.          jmp 1000
  227.          jsr 100     ;should be extended addressing
  228.          jsr h'00,x
  229.          jsr h'ff,x
  230.          jsr 1000
  231.          aba
  232.          clra
  233.          clrb
  234.          cba
  235.          coma
  236.          comb
  237.          nega
  238.          negb
  239.          daa
  240.          deca
  241.          decb
  242.          inca
  243.          incb
  244.          psha
  245.          pshb
  246.          pula
  247.          pulb
  248.          rola
  249.          rolb
  250.          rora
  251.          rorb
  252.          asla
  253.          aslb
  254.          asra
  255.          asrb
  256.          lsra
  257.          lsrb
  258.          sba
  259.          tab
  260.          tba
  261.          tsta
  262.          tstb
  263.          dex
  264.          des
  265.          inx
  266.          ins
  267.          txs
  268.          tsx
  269.          nop
  270.          rti
  271.          rts
  272.          swi
  273.          wai
  274.          clc
  275.          cli
  276.          clv
  277.          sec
  278.          sei
  279.          sev
  280.          tap
  281.          tpa
  282.          bra reltst
  283.          bcc reltst
  284.          bcs reltst
  285.          beq reltst
  286.          bge reltst
  287.          bgt reltst
  288. reltst:  bhi reltst
  289.          ble reltst
  290.          bls reltst
  291.          blt reltst
  292.          bmi reltst
  293.          bne reltst
  294.          bvc reltst
  295.          bvs reltst
  296.          bpl reltst
  297.          bsr reltst
  298.  
  299.          adda # forward1
  300.          adda #forward2
  301.          adda forward3
  302.          adda  forward1,x
  303.          adda forward2,x
  304.          adda forward4
  305.          addb # forward1
  306.          addb #forward2
  307.          addb forward3
  308.          addb  forward1,x
  309.          addb forward2,x
  310.          addb forward4
  311.          adca # forward1
  312.          adca #forward2
  313.          adca forward3
  314.          adca  forward1,x
  315.          adca forward2,x
  316.          adca forward4
  317.          adcb # forward1
  318.          adcb #forward2
  319.          adcb forward3
  320.          adcb  forward1,x
  321.          adcb forward2,x
  322.          adcb forward4
  323.          anda # forward1
  324.          anda #forward2
  325.          anda forward3
  326.          anda  forward1,x
  327.          anda forward2,x
  328.          anda forward4
  329.          andb # forward1
  330.          andb #forward2
  331.          andb forward3
  332.          andb  forward1,x
  333.          andb forward2,x
  334.          andb forward4
  335.          bita # forward1
  336.          bita #forward2
  337.          bita forward3
  338.          bita  forward1,x
  339.          bita forward2,x
  340.          bita forward4
  341.          bitb # forward1
  342.          bitb #forward2
  343.          bitb forward3
  344.          bitb  forward1,x
  345.          bitb forward2,x
  346.          bitb forward4
  347.          cmpa # forward1
  348.          cmpa #forward2
  349.          cmpa forward3
  350.          cmpa  forward1,x
  351.          cmpa forward2,x
  352.          cmpa forward4
  353.          cmpb # forward1
  354.          cmpb #forward2
  355.          cmpb forward3
  356.          cmpb  forward1,x
  357.          cmpb forward2,x
  358.          cmpb forward4
  359.          eora # forward1
  360.          eora #forward2
  361.          eora forward3
  362.          eora  forward1,x
  363.          eora forward2,x
  364.          eora forward4
  365.          eorb # forward1
  366.          eorb #forward2
  367.          eorb forward3
  368.          eorb  forward1,x
  369.          eorb forward2,x
  370.          eorb forward4
  371.          ldaa # forward1
  372.          ldaa #forward2
  373.          ldaa forward3
  374.          ldaa  forward1,x
  375.          ldaa forward2,x
  376.          ldaa forward4
  377.          ldab # forward1
  378.          ldab #forward2
  379.          ldab forward3
  380.          ldab  forward1,x
  381.          ldab forward2,x
  382.          ldab forward4
  383.          oraa # forward1
  384.          oraa #forward2
  385.          oraa forward3
  386.          oraa  forward1,x
  387.          oraa forward2,x
  388.          oraa forward4
  389.          orab # forward1
  390.          orab #forward2
  391.          orab forward3
  392.          orab  forward1,x
  393.          orab forward2,x
  394.          orab forward4
  395.          staa forward3
  396.          staa  forward1,x
  397.          staa forward2,x
  398.          staa forward4
  399.          stab forward3
  400.          stab  forward1,x
  401.          stab forward2,x
  402.          stab forward4
  403.          suba # forward1
  404.          suba #forward2
  405.          suba forward3
  406.          suba  forward1,x
  407.          suba forward2,x
  408.          suba forward4
  409.          subb # forward1
  410.          subb #forward2
  411.          subb forward3
  412.          subb  forward1,x
  413.          subb forward2,x
  414.          subb forward4
  415.          sbca # forward1
  416.          sbca #forward2
  417.          sbca forward3
  418.          sbca  forward1,x
  419.          sbca forward2,x
  420.          sbca forward4
  421.          sbcb # forward1
  422.          sbcb #forward2
  423.          sbcb forward3
  424.          sbcb  forward1,x
  425.          sbcb forward2,x
  426.          sbcb forward4
  427.          cpx # forward1
  428.          cpx #forward2
  429.          cpx forward3
  430.          cpx  forward1,x
  431.          cpx forward2,x
  432.          cpx forward4
  433.          ldx # forward1
  434.          ldx #forward2
  435.          ldx forward3
  436.          ldx  forward1,x
  437.          ldx forward2,x
  438.          ldx forward4
  439.          lds # forward1
  440.          lds #forward2
  441.          lds forward3
  442.          lds  forward1,x
  443.          lds forward2,x
  444.          lds forward4
  445.          stx forward3
  446.          stx  forward1,x
  447.          stx forward2,x
  448.          stx forward4
  449.          sts forward3
  450.          sts  forward1,x
  451.          sts forward2,x
  452.          sts forward4
  453.          clr forward3
  454.          clr  forward1,x
  455.          clr forward2,x
  456.          clr forward4
  457.          com forward3
  458.          com  forward1,x
  459.          com forward2,x
  460.          com forward4
  461.          neg forward3
  462.          neg  forward1,x
  463.          neg forward2,x
  464.          neg forward4
  465.          dec forward3
  466.          dec  forward1,x
  467.          dec forward2,x
  468.          dec forward4
  469.          inc forward3
  470.          inc  forward1,x
  471.          inc forward2,x
  472.          inc forward4
  473.          rol forward3
  474.          rol  forward1,x
  475.          rol forward2,x
  476.          rol forward4
  477.          ror forward3
  478.          ror  forward1,x
  479.          ror forward2,x
  480.          ror forward4
  481.          asl forward3
  482.          asl  forward1,x
  483.          asl forward2,x
  484.          asl forward4
  485.          asr forward3
  486.          asr  forward1,x
  487.          asr forward2,x
  488.          asr forward4
  489.          lsr forward3
  490.          lsr  forward1,x
  491.          lsr forward2,x
  492.          lsr forward4
  493.          tst forward3
  494.          tst  forward1,x
  495.          tst forward2,x
  496.          tst forward4
  497.          jmp forward3
  498.          jmp  forward1,x
  499.          jmp forward2,x
  500.          jmp forward4
  501.          jsr forward3
  502.          jsr  forward1,x
  503.          jsr forward2,x
  504.          jsr forward4
  505.          aba
  506.          clra
  507.          clrb
  508.          cba
  509.          coma
  510.          comb
  511.          nega
  512.          negb
  513.          daa
  514.          deca
  515.          decb
  516.          inca
  517.          incb
  518.          psha
  519.          pshb
  520.          pula
  521.          pulb
  522.          rola
  523.          rolb
  524.          rora
  525.          rorb
  526.          asla
  527.          aslb
  528.          asra
  529.          asrb
  530.          lsra
  531.          lsrb
  532.          sba
  533.          tab
  534.          tba
  535.          tsta
  536.          tstb
  537.          dex
  538.          des
  539.          inx
  540.          ins
  541.          txs
  542.          tsx
  543.          nop
  544.          rti
  545.          rts
  546.          swi
  547.          wai
  548.          clc
  549.          cli
  550.          clv
  551.          sec
  552.          sei
  553.          sev
  554.          tap
  555.          tpa
  556.          bra reltst2
  557.          bcc reltst2
  558.          bcs reltst2
  559.          beq reltst2
  560.          bge reltst2
  561.          bgt reltst2
  562. reltst2:  bhi reltst2
  563.          ble reltst2
  564.          bls reltst2
  565.          blt reltst2
  566.          bmi reltst2
  567.          bne reltst2
  568.          bvc reltst2
  569.          bvs reltst2
  570.          bpl reltst2
  571.          bsr reltst2
  572. synctst2:
  573.          .equ forward1,h'00
  574.          .equ forward2,h'ff
  575.          .equ forward3,100
  576.          .equ forward4,1000
  577.          .org 1000
  578.          .end
  579.